home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / internet / irc_i_dodatki / phoenix / bin / rexx / phoenix.amirx < prev    next >
Text File  |  1996-11-27  |  733b  |  15 lines
  1. /*\
  2.  * Phoenix.amirx -- AmIRC to Phoenix interface
  3.  * Usage  : change your Event ANY/JOIN/KICK/MODE/INVITE settings to 
  4.  *        : "phoenix.amirx %p" & edit .phoenix.cfg to suit your needs.
  5.  * $VER: PhoEniX.amirx 1.17 (27.11.96) by |Paladin|
  6. \*/
  7. options results;parse arg line;p=address();parse var p .'.'p2
  8. n='PHOENIX.'p2
  9. if ~show('P',n) then do;if ~show('L','rexxsupport.library') then if ~addlib('rexxsupport.library',0,-30,0) then do;'echo P='phx' 'd2c(2)'FATAL ERROR:'d2c(2)' Unable to load rexxsupport.library.'
  10. exit;end;forbid();address command;'run >nil: rexx/Phoenix >>ram:Phoenix.err 'p2
  11. 'waitforport 'n
  12. address;if ~show('P',n) then 'echo P='d2c(27)'b«PhoEniX» Unable to start Phoenix'
  13. permit();exit;end;address(n)
  14. p line
  15.